home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 1 / BBS in a box - Trilogy I.iso / Files / Music / M / M5Mac ƒ / Scripts folder / JCR300.PAR < prev    next >
Encoding:
Text File  |  1992-06-26  |  1.9 KB  |  77 lines  |  [TEXT/M5Mc]
  1. COM ----------------JCR300------------------------------;
  2. COM COMPARAISON DE DIFFERENTS DECAYS;
  3. COM ----------------------------------------------------;
  4. INS 0 1;
  5. CNV P5=P5*10;
  6. CNV P7=HTZ(P7);
  7. CNV P9=DUR(P9);
  8. IOS P5 P9 B3 F4 P30;
  9. SET P6;IOS B3 P7 B3 F7 P29;
  10. OUT B3;
  11. END;
  12. COM ----------------------------------------------------;
  13. INS 0 2;
  14. CNV P5=P5*10;
  15. CNV P7=HTZ(P7);
  16. CNV P9=DUR(P9);
  17. IOS P5 P9 B3 F5 P30;
  18. SET P6;IOS B3 P7 B3 F6 P29;
  19. OUT B3;
  20. END;
  21. COM ----------------------------------------------------;
  22. INS 0 3;
  23. CNV P5=P5*10;
  24. CNV P7=HTZ(P7);
  25. CNV P9=DUR(P9);
  26. IOS P5 P9 B3 F5 P30;
  27. SET P6;IOS B3 P7 B3 F7 P29;
  28. OUT B3;
  29. END;
  30. COM ----------------------------------------------------;
  31. INS 0 4;
  32. CNV P5=P5*10;
  33. CNV P7=HTZ(P7);
  34. CNV P9=DUR(P9);
  35. IOS P5 P9 B3 F5 P30;
  36. SET P6;IOS B3 P7 B3 F8 P29;
  37. OUT B3;
  38. END;
  39. COM ----------------------------------------------------;
  40. GEN 0 1 4 512 0 0 1 1 0 512;
  41. GEN 0 7 5 512 -8;
  42. GEN 0 3 6 512 0 10 10 10 0 -10 -10 -10 0;
  43. GEN 0 2 7 512 1 .5 .3 .2 .15 .12 6;
  44. GEN 0 2 8  512 1 .2 .05 3;
  45. COM -------------------------------------------------------------------------;
  46. COM CHUTE LINEAIRE PUIS EXPONENTIELLE AVEC 1 SEULE COMPOSANTE;
  47. NOT 0 1 2 1700 7 440 0 2;
  48. NOT 3 3 2 1700 7 440 0 2 ;
  49. NOT 6 1 2 1700 7 440 0 2 ;
  50. NOT 8 3 4 1700 7 440 0 4;
  51. SEC 14;
  52. COM --------------------------------------------------------------------------;
  53. COM TRIPLE DECAY;
  54. NOT 0 2 .1 1000 6 440 0 .1;
  55. NOT 0 3 1.8 350 7 440 0 1.8;
  56. NOT 0 4 3 200 8 440 0 4 ;
  57. SEC 4;
  58. NOT 0 2 .1 1000 6 443 0 .1;
  59. NOT 0 3 1.8 350 7 440 0 1.8;
  60. NOT 0 4 3 200 8 441 0 4;
  61. SEC 4;
  62. NOT 0 4 .1 1000 8 440 0 .1;
  63. NOT 0 3 1.8 350 7 440 0 1.8;
  64. NOT 0 2 3 200 6 440 0 4;
  65. SEC 4;
  66. NOT 0 4 .1 1000 8 443 0 .1;
  67. NOT 0 3 1.8 350 7 440 0 1.8;
  68. NOT 0 2 3 200 6 441 0 4;
  69. SEC 4;
  70. NOT 0 2 .1 1000 6 440 0 .1;
  71. NOT 0 3 1.8 350 7 440 0 1.8;
  72. NOT 0 4 3 200 8 440 0 4;
  73. SEC 4;
  74. NOT 0 2 .1 1000 6 448 0 .1;
  75. NOT 0 3 1.8 350 7 440 0 1.8;
  76. NOT 0 4 3 200 8 444 0 4;
  77. TER 4;